home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TeX 1995 July
/
TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO
/
macros
/
latex209
/
contrib
/
pslatex
/
fonts
/
old-dvips
/
mk-fonts
< prev
next >
Wrap
Text File
|
1992-09-09
|
2KB
|
92 lines
#!/bin/sh
AFM=/usr/common/lib/tex3/fonts/afm
VF=/usr/common_master/lib/tex3/fonts/vf/PSLATEX
TFM=/usr/common_master/lib/tex3/fonts/tfm/PSLATEX
echo '# this should only be taken as a starting point' >psfonts.newext
echo '# execute this to install fonts' >cmnds
echo '# output (mostly garbage) from vptovf' >vperrs
# make smallcaps fonts
echo Making SmallCaps of...
while read afm new old
do
echo $afm
afm2tfm $AFM/$afm -V vpl/$new.vpl tfm/$new.tfm
ed - vpl/$new.vpl <<-yyy
g/^(FAMILY/d
g/^(CHECKSUM/d
g/^ (FONTNAME/s/ [^ ]*)/ $old)/
w
q
yyy
vptovf vpl/$new.vpl vf/$new.vf tfm/$new.tfm >>vperrs
echo mv -i vf/$new.vf $VF >>cmnds
echo mv -i tfm/$new.tfm $TFM >>cmnds
done <<xxx
AvantGarde-Book pagkc0 rpagk
AvantGarde-Demi pagdc0 rpagd
Bookman-Light pbklc0 rpbkl
Bookman-Demi pbkdc0 rpbkd
Courier pcrrc0 rpcrr
Courier-Bold pcrbc0 rpcrb
Helvetica phvrc0 rphvr
Helvetica-Bold phvbc0 rphvb
Helvetica-Narrow phvrcn0 rphvrrn
Helvetica-NarrowBold phvbcn0 rphvbrn
NewCenturySchlbk-Roman pncrc0 rpncr
NewCenturySchlbk-Bold pncbc0 rpncb
Palatino-Roman pplrc0 rpplr
Palatino-Bold pplbc0 rpplb
Times-Roman ptmrc0 rptmr
Times-Bold ptmbc0 rptmb
xxx
# make oblique fonts
echo Making Oblique of...
while read afm new old slant
do
echo $afm
afm2tfm $AFM/$afm -s $slant tfm/$new.tfm
echo $new $afm-Oblique '"'/$afm $slant SlantFont'"' >>psfonts.newext
echo mv -i tfm/$new.tfm $TFM >>cmnds
done <<xxx
Bookman-Light pbklo0 rpbkl .11
Bookman-Demi pbkdo0 rpbkd .11
NewCenturySchlbk-Roman pncro0 rpncr .11
NewCenturySchlbk-Bold pncbo0 rpncb .11
Palatino-Roman pplro0 rpplr .11
Palatino-Bold pplbo0 rpplb .11
Times-Roman ptmro0 rptmr .167
Times-Bold ptmbo0 rptmb .167
xxx
# make condensed fonts
echo Condensing...
while read afm new old con
do
echo $afm
afm2tfm $AFM/$afm -e $con tfm/$new.tfm
if expr match "$afm" '.*Bold' >/dev/null
then # bold fonts don't need thickening
echo $new $afm-Narrow '"'/$afm $con ExtendFont'"' >>psfonts.newext
else
echo $new $afm-Narrow '"'/$afm $con ExtendFont /$afm-Narrow 1.3 ThickenFont'"' >>psfonts.newext
fi
echo mv -i tfm/$new.tfm $TFM >>cmnds
done <<xxx
Courier pcrrrn0 rpcrr .85
Courier-Bold pcrbrn0 rpcrb .85
Courier-Oblique pcrron0 rpcrro .85
Courier-BoldOblique pcrbon0 rpcrbo .85
xxx
exit 0